home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / T-TPUG Old Monthly Disks / (c)tg.d64 / variable list.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  1KB  |  24 lines
  1. 120 ME=PEEK(55)+256*PEEK(56)
  2. 130 VS=ME-256:PA=0
  3. 140 POKE56,PEEK(56)-1
  4. 150 FORI=VSTOVS+240:READA:POKEI,A:PA=PA+A:NEXT
  5. 160 IFPA<>33670THENPRINT"DATA ERROR":END
  6. 170 PRINT"SYS"VS" AFTER RUNNING PROGRAM TO LIST VARIABLES":NEW
  7. 180 DATA165,45,197,47,240,93,133,253,165,46,133,254,160,0
  8. 200 DATA169,0,141,61,3,177,253,41,128,208,60,177,253,41
  9. 220 DATA127,32,210,255,200,173,61,3,201,0,208,6,177,253
  10. 240 DATA41,128,208,46,177,253,41,127,32,210,255,173,61,3
  11. 260 DATA32,210,255,169,32,32,210,255,152,24,105,6,144,5
  12. 280 DATA164,254,200,132,254,168,101,253,197,47,240,17,208,186
  13. 300 DATA96,169,37,141,61,3,208,189,169,36,141,61,3,208
  14. 320 DATA203,165,49,197,47,240,114,165,47,133,253,165,48,133
  15. 340 DATA254,160,0,169,0,141,61,3,177,253,240,216,41,128
  16. 360 DATA208,77,177,253,41,127,32,210,255,200,173,61,3,201
  17. 380 DATA0,208,6,177,253,41,128,208,63,177,253,41,127,32
  18. 400 DATA210,255,173,61,3,32,210,255,169,40,32,210,255,169
  19. 420 DATA41,32,210,255,169,32,32,210,255,200,177,253,24,101
  20. 440 DATA253,197,49,240,39,177,253,24,101,253,170,200,177,253
  21. 460 DATA101,254,133,254,134,253,208,165,96,169,37,141,61,3
  22. 480 DATA208,172,169,36,141,61,3,208,186,165,48,197,50,208
  23. 500 DATA136,96,200,234,177,253,101,254,197,50,240,224,16,222,136,208,202
  24.